10 PRINT"[147]"
20 M$="[158] * * *  F A L L I N G     [144]"
30 LN=10
40 B=LEN(M$):CT=(40-B)/2-1:FOR A=1TOB:X$=MID$(M$,A,1):PRINTCHR$(19)
50 IF X$<>" "THENFOR T=1TO LN-2:PRINTTAB(CT+A)X$CHR$(145):PRINTTAB(CT+A)" "
60 NEXT:PRINTTAB(CT+A)X$:NEXT
110 PRINT""
120 M$="        L E T T E R S  * * *[144]"
130 LN=13
140 B=LEN(M$):CT=(40-B)/2-1:FOR A=1TOB:X$=MID$(M$,A,1):PRINTCHR$(19)
150 IF X$<>" "THENFOR T=1TO LN-2:PRINTTAB(CT+A)X$CHR$(145):PRINTTAB(CT+A)" "
160 NEXT:PRINTTAB(CT+A)X$:NEXT